Exec.RegisterDelphiFunction(@MyDialog,               'DIALOG',                cdRegister);
Exec.RegisterDelphiFunction(@MyDlgStr,               'DLGSTR',                cdRegister);

Exec.RegisterDelphiFunction(@MyCell,                 'CELL',                  cdRegister);
Exec.RegisterDelphiFunction(@MySetCell,              'SETCELL',               cdRegister);
Exec.RegisterDelphiFunction(@MyWait,                 'WAIT',                  cdRegister);
Exec.RegisterDelphiFunction(@MyPlay,                 'PLAY',                  cdRegister);
Exec.RegisterDelphiFunction(@MyDisplay,              'DISPLAY',               cdRegister);
Exec.RegisterDelphiFunction(@MyAlert,                'ALERT',                 cdRegister);
Exec.RegisterDelphiFunction(@MyRand,                 'RAND',                  cdRegister);
Exec.RegisterDelphiFunction(@MyLoadMap,              'LOADMAP',               cdRegister);
Exec.RegisterDelphiFunction(@MyGenMap,               'GENMAP',                cdRegister);
Exec.RegisterDelphiFunction(@MyGetMap,               'GETMAP',                cdRegister);
Exec.RegisterDelphiFunction(@MyCellItem,             'CELLITEM',              cdRegister);
Exec.RegisterDelphiFunction(@MySetCellItem,          'SETCELLITEM',           cdRegister);

Exec.RegisterDelphiFunction(@MyGetStr,               'GETSTR',                cdRegister);
Exec.RegisterDelphiFunction(@MySetStr,               'SETSTR',                cdRegister);
Exec.RegisterDelphiFunction(@MyGetInt,               'GETINT',                cdRegister);
Exec.RegisterDelphiFunction(@MySetInt,               'SETINT',                cdRegister);
Exec.RegisterDelphiFunction(@MyIncInt,               'INCINT',                cdRegister);
Exec.RegisterDelphiFunction(@MyDecInt,               'DECINT',                cdRegister);
Exec.RegisterDelphiFunction(@MyGetBool,              'GETBOOL',               cdRegister);
Exec.RegisterDelphiFunction(@MySetBool,              'SETBOOL',               cdRegister);
Exec.RegisterDelphiFunction(@MyLetVar,               'LETVAR',                cdRegister);
Exec.RegisterDelphiFunction(@MyEmptyVar,             'EMPTYVAR',              cdRegister);
Exec.RegisterDelphiFunction(@MyFlag,                 'FLAG',                  cdRegister);
Exec.RegisterDelphiFunction(@MyFlagTrue,             'FLAGTRUE',              cdRegister);
Exec.RegisterDelphiFunction(@MyFlagFalse,            'FLAGFALSE',             cdRegister);
Exec.RegisterDelphiFunction(@MyIsVar,                'IsVar',                 cdRegister);

Exec.RegisterDelphiFunction(@MyGetStrength,          'GetStrength',           cdRegister);
Exec.RegisterDelphiFunction(@MyGetAgility,           'GetAgility',            cdRegister);
Exec.RegisterDelphiFunction(@MyGetStamina,           'GetStamina',            cdRegister);
Exec.RegisterDelphiFunction(@MyGetIntellect,         'GetIntellect',          cdRegister);
Exec.RegisterDelphiFunction(@MyGetSpirit,            'GetSpirit',             cdRegister);

Exec.RegisterDelphiFunction(@MyBox,                  'BOX',                   cdRegister);
Exec.RegisterDelphiFunction(@MyRun,                  'RUN',                   cdRegister);
Exec.RegisterDelphiFunction(@MyInput,                'INPUT',                 cdRegister);
Exec.RegisterDelphiFunction(@MyLog,                  'LOG',                   cdRegister);

Exec.RegisterDelphiFunction(@MyTVClear,              'TVClear',               cdRegister);
Exec.RegisterDelphiFunction(@MyTVMove,               'TVMove',                cdRegister);
Exec.RegisterDelphiFunction(@MyTVAdd,                'TVAdd',                 cdRegister);
Exec.RegisterDelphiFunction(@MyTVGet,                'TVGET',                 cdRegister);

Exec.RegisterDelphiFunction(@MyAddItem,              'ADDITEM',               cdRegister);
Exec.RegisterDelphiFunction(@MyAddItems,             'ADDITEMS',              cdRegister);
Exec.RegisterDelphiFunction(@MyGetItemType,          'GETITEMTYPE',           cdRegister);
Exec.RegisterDelphiFunction(@MyGetItemCount,         'GETITEMCOUNT',          cdRegister);
Exec.RegisterDelphiFunction(@MyAddMagicItem,         'ADDMAGICITEM',          cdRegister);
Exec.RegisterDelphiFunction(@MyDelItem,              'DELITEM',               cdRegister);
Exec.RegisterDelphiFunction(@MyIsItem,               'ISITEM',                cdRegister);
Exec.RegisterDelphiFunction(@MyInvCount,             'INVCOUNT',              cdRegister);
Exec.RegisterDelphiFunction(@MyEat,                  'EAT',                   cdRegister);
Exec.RegisterDelphiFunction(@MyGetDollItemParam,     'GetDollItemParam',      cdRegister);
Exec.RegisterDelphiFunction(@MySetDollItemParam,     'SetDollItemParam',      cdRegister);


Exec.RegisterDelphiFunction(@MySaveGame,             'SAVEGAME',              cdRegister);
Exec.RegisterDelphiFunction(@MyLoadGame,             'LOADGAME',              cdRegister);
Exec.RegisterDelphiFunction(@MySendInfo,             'SENDINFO',              cdRegister);
Exec.RegisterDelphiFunction(@MyGetKeyState,          'GETKEYSTATE',           cdRegister);

Exec.RegisterDelphiFunction(@MyGetWord,              'GetWord',               cdRegister);
Exec.RegisterDelphiFunction(@MyGetByte,              'GetByte',               cdRegister);
Exec.RegisterDelphiFunction(@MySetMobParam,          'SetMobParam',           cdRegister);
Exec.RegisterDelphiFunction(@MyGetMobParam,          'GetMobParam',           cdRegister);
Exec.RegisterDelphiFunction(@MyAIMove,               'AIMove',                cdRegister);
Exec.RegisterDelphiFunction(@MyInitAIMove,           'InitAIMove',            cdRegister);
Exec.RegisterDelphiFunction(@MyCellMask,             'CellMask',              cdRegister);
Exec.RegisterDelphiFunction(@MyInteractNPC,          'InteractNPC',           cdRegister);
Exec.RegisterDelphiFunction(@MyGetSignText,          'GetSignText',           cdRegister);
Exec.RegisterDelphiFunction(@MyGetNPCParam,          'GetNPCParam',           cdRegister);
Exec.RegisterDelphiFunction(@MyRedrawPC,             'REDRAWPC',              cdRegister);

Exec.RegisterDelphiFunction(@MyIsItemOnDoll,         'IsItemOnDoll',          cdRegister);
Exec.RegisterDelphiFunction(@MyGenItem,              'GenItem',               cdRegister);
Exec.RegisterDelphiFunction(@MyShowTrade,            'ShowTrade',             cdRegister);
Exec.RegisterDelphiFunction(@MyShowStash,            'ShowStash',             cdRegister);
Exec.RegisterDelphiFunction(@MyClampModify,          'ClampModify',           cdRegister);
Exec.RegisterDelphiFunction(@MyInMap,                'InMap',                 cdRegister);
Exec.RegisterDelphiFunction(@MyVolume,               'Volume',                cdRegister);

Exec.RegisterDelphiFunction(@MySkill,                'Skill',                 cdRegister);






